declare
[MyLang]={Module.link ['/home/luciano/Desktop/9/LazyLang.ozf']}

fun {F1 A B C}
   {Time.delay 5000}
   B+C
end

fun {F2 Y}
   {Time.delay 5000}
   Y
end

F3 = {MyLang.assign fun{$ Y1 Y2}
		       {Time.delay 5000}
		       Y1+Y2
		    end
     }

{Browse [F1 F2 F3]}
V1 = 3
V2 ={MyLang.assign 6}
V3= {MyLang.assign 10}
V4={MyLang.record [V1 V2 V3 {MyLang.call2 F1 V1 V2}
		   {MyLang.call1 F2 V3}
		   {MyLang.call2 F3 V2 V3}]}
{Browse V1}
{Browse V2}
{Browse V3}
{Browse V4}

{Time.delay 2000} %1
{Browse V4.1 + V4.2.1}

{Time.delay 2000} %2
{Browse V4.2.2.2.2.1 + 1}

{Time.delay 2000} %3
{Browse V4.2.2.2.1 + 1} %4
